MacWorld 1999 February/Macworld (1999-02).dmg/Serious Demos/XTension demo/Scripts/Its Dark.On

Text File | 1998-07-28 | 456 b | 14 lines | [TEXT/ToyS]

--this is a flag with a script attached:
--  it is controlled by the two redundant duck sensors
--when this unit is turned ON, it is dark according to TWO sensors
--and All Outside Lights should be unblocked

--  since it is night time, the outside lights are not blocked, so just
unblock unit "Outside Lights"

if time of (current date) > 17 * hours then
    write log "Reasonable daylight length today"
else
    write log "It must be a very dark day."
end if